home *** CD-ROM | disk | FTP | other *** search
/ Internet Magazine 2003 October / INTERNET108.ISO / pc / software / windows / multimed / ultimatepaint / setup.exe / {app} / ShadowCaster.afs < prev    next >
Encoding:
Text File  |  1999-06-06  |  1.2 KB  |  42 lines
  1. %RGB-1.0
  2. 5
  3. 255
  4. 5
  5. 217
  6. 0
  7. 0
  8. 0
  9. 0
  10. (x>ctl(0)-1 && y>ctl(0)-1) ? src(x-ctl(0),y-ctl(0),z) :(x<ctl(0) && y>ctl(0)-1 ) ? scl(x,0,ctl(0)-1,ctl(1),255) * src(x-ctl(0),y-ctl(0),z)/255 :(x>ctl(0)-1 && y<ctl(0) ) ? scl(y,0,ctl(0)-1,ctl(1),255) * src(x-ctl(0),y-ctl(0),z)/255 :min(scl(x,0,ctl(0)-1,ctl(1),255),scl(y,0,ctl(0)-1,ctl(1),255))*src(x-ctl(0),y-ctl(0),z)/255
  11.  
  12. (x>ctl(0)-1 && y>ctl(0)-1) ? src(x-ctl(0),y-ctl(0),z) :(x<ctl(0) && y>ctl(0)-1 ) ? scl(x,0,ctl(0)-1,ctl(2),255) * src(x-ctl(0),y-ctl(0),z)/255 :(x>ctl(0)-1 && y<ctl(0) ) ? scl(y,0,ctl(0)-1,ctl(2),255) * src(x-ctl(0),y-ctl(0),z)/255 :min(scl(x,0,ctl(0)-1,ctl(2),255),scl(y,0,ctl(0)-1,ctl(2),255))*src(x-ctl(0),y-ctl(0),z)/255
  13.  
  14. (x>ctl(0)-1 && y>ctl(0)-1) ? src(x-ctl(0),y-ctl(0),z) :(x<ctl(0) && y>ctl(0)-1 ) ? scl(x,0,ctl(0)-1,ctl(3),255) * src(x-ctl(0),y-ctl(0),z)/255 :(x>ctl(0)-1 && y<ctl(0) ) ? scl(y,0,ctl(0)-1,ctl(3),255) * src(x-ctl(0),y-ctl(0),z)/255 :min(scl(x,0,ctl(0)-1,ctl(3),255),scl(y,0,ctl(0)-1,ctl(3),255))*src(x-ctl(0),y-ctl(0),z)/255
  15.  
  16. a
  17.  
  18. Neology
  19.  
  20. Shadowcaster
  21.  
  22. 100526.16@compuserve.com
  23.  
  24. (c) 1997 Werner D. Streidt
  25.  
  26. 1: Shadow Width
  27.  
  28. 2: Red Intensity
  29.  
  30. 3: Green Intensity
  31.  
  32. 4: Blue Intensity
  33.  
  34. 5: 
  35.  
  36. 6: 
  37.  
  38. 7: 
  39.  
  40. 8: 
  41.  
  42.